home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 126-150 / scopedisk133 / basprghelp / intuits.header < prev    next >
Encoding:
Text File  |  1995-03-19  |  241 b   |  9 lines
  1. COMMON SHARED which%,BoxIndex%,MaxLen%,ScrID%,Sheight%
  2. DIM work%(400)
  3. DIM x1%(51),y1%(51),x2%(51),y2%(51)
  4. REM Set ScrID% to -1 for WB
  5. ScrID%=-1
  6. which%=0 'which% box is selected
  7. BoxIndex%=1 'How many gadgets
  8. maxlen%=15 'length of text fields
  9.